﻿Public Class frmListaCLientes
    ' VAMOS A CREAR LAS CLASES, EN ESTE EJEMPLO LA LISTA DE PERSONAS JURIDICAS.
    Dim listaPersonasJuridicas As New LinkedList(Of PersonaJurica)
    Public Property ListaPersonasJuridicasTotales As LinkedList(Of PersonaJurica)
        Get
            Return ListaPersonasJuridicas
        End Get
        Set(ByVal value As LinkedList(Of PersonaJurica))
            listaPersonasJuridicas = value

        End Set
    End Property
    Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged

    End Sub

    Private Sub frmListaCLientes_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ' INGRESANDO CODIGO PARA EL BUCLE DE TODOS LOS ELEMENTOS DE LA LISTA
        For Each myPersonasJuridicas As PersonaJurica In listaPersonasJuridicas
            Dim item As ListViewItem
            item = Me.ListView1.Items.Add(New ListViewItem(myPersonasJuridicas.Codigo, 0))
            item.SubItems.Add(myPersonasJuridicas.Nombre)
            item.SubItems.Add(myPersonasJuridicas.Dni)

        Next

       
    End Sub
End Class